home *** CD-ROM | disk | FTP | other *** search
/ The Frank Lloyd Wright Companion / The Frank Lloyd Wright Companion.iso / fullmacapps / macfllwc_small.sit / MacFLLWC_Small / flw.mvb.rsrc / CODE_20_QH ZoomRect.txt < prev    next >
Text File  |  1995-09-30  |  28KB  |  502 lines
  1. # near model CODE resource
  2. # jump table entries: 63264-63267 (4 of them)
  3. 00000000  FFFF                     .extension 0xFFF // unimplemented
  4. 00000002  F720                     .extension 0x720 // unimplemented
  5. 00000004  0000 0546                ori.b      D0, 0x46 /* 'F' */
  6. 00000008  48E7 1E3A                movem.l    -[A7], D3,D4,D5,D6,A2,A3,A4,A6
  7. 0000000C  4FEF FF6C                lea.l      A7, [A7 - 0x94]
  8. 00000010  266F 00B8                movea.l    A3, [A7 + 0xB8]
  9. 00000014  246F 00BC                movea.l    A2, [A7 + 0xBC]
  10. 00000018  7A02                     moveq.l    D5, 0x02
  11. 0000001A  4EBA 04A6                jsr        [PC + 0x4A6 /* 000004C2 */]
  12. 0000001E  594F                     subq.w     A7, 4
  13. 00000020  2EB8 09EE                move.l     [A7], [0x000009EE /* GrayRgn */]
  14. 00000024  205F                     movea.l    A0, [A7]+
  15. 00000026  2C48                     movea.l    A6, A0
  16. 00000028  2008                     move.l     D0, A0
  17. 0000002A  6700 0188                beq        +0x18A /* 000001B4 */
  18. 0000002E  4857                     pea.l      [A7]
  19. 00000030  A874                     syscall    GetPort
  20. 00000032  486F 0004                pea.l      [A7 + 0x4]
  21. 00000036  A86F                     syscall    OpenPort
  22. 00000038  2F0E                     move.l     -[A7], A6
  23. 0000003A  A879                     syscall    SetClip
  24. 0000003C  2F0E                     move.l     -[A7], A6
  25. 0000003E  2F2F 0020                move.l     -[A7], [A7 + 0x20]
  26. 00000042  A8DC                     syscall    CopyRgn
  27. 00000044  2856                     movea.l    A4, [A6]
  28. 00000046  548C                     addq.l     A4, 2
  29. 00000048  302C 0002                move.w     D0, [A4 + 0x2]
  30. 0000004C  48C0                     ext.l      D0
  31. 0000004E  322C 0006                move.w     D1, [A4 + 0x6]
  32. 00000052  48C1                     ext.l      D1
  33. 00000054  9280                     sub.l      D1, D0
  34. 00000056  3F01                     move.w     -[A7], D1
  35. 00000058  3014                     move.w     D0, [A4]
  36. 0000005A  48C0                     ext.l      D0
  37. 0000005C  322C 0004                move.w     D1, [A4 + 0x4]
  38. 00000060  48C1                     ext.l      D1
  39. 00000062  9280                     sub.l      D1, D0
  40. 00000064  3F01                     move.w     -[A7], D1
  41. 00000066  A876                     syscall    PortSize
  42. 00000068  486D 15E0                pea.l      [A5 + 0x15E0]
  43. 0000006C  A89D                     syscall    PenPat
  44. 0000006E  3F3C 000E                move.w     -[A7], 0xE
  45. 00000072  A89C                     syscall    PenMode
  46. 00000074  4AAF 00C0                tst.l      [A7 + 0xC0]
  47. 00000078  6728                     beq        +0x2A /* 000000A2 */
  48. 0000007A  2F53 0084                move.l     [A7 + 0x84], [A3]
  49. 0000007E  2F6B 0004 0088           move.l     [A7 + 0x88], [A3 + 0x4]
  50. 00000084  594F                     subq.w     A7, 4
  51. 00000086  2F3C 0005 0006           move.l     -[A7], 0x50006
  52. 0000008C  A869                     syscall    FixRatio
  53. 0000008E  201F                     move.l     D0, [A7]+
  54. 00000090  2C00                     move.l     D6, D0
  55. 00000092  594F                     subq.w     A7, 4
  56. 00000094  2F3C 2710 021D           move.l     -[A7], 0x2710021D
  57. 0000009A  A869                     syscall    FixRatio
  58. 0000009C  201F                     move.l     D0, [A7]+
  59. 0000009E  2600                     move.l     D3, D0
  60. 000000A0  601E                     bra        +0x20 /* 000000C0 */
  61. label000000A2:
  62. 000000A2  2F52 0084                move.l     [A7 + 0x84], [A2]
  63. 000000A6  2F6A 0004 0088           move.l     [A7 + 0x88], [A2 + 0x4]
  64. 000000AC  594F                     subq.w     A7, 4
  65. 000000AE  2F3C 0006 0005           move.l     -[A7], 0x60005
  66. 000000B4  A869                     syscall    FixRatio
  67. 000000B6  201F                     move.l     D0, [A7]+
  68. 000000B8  2C00                     move.l     D6, D0
  69. 000000BA  263C 0001 0000           move.l     D3, 0x10000
  70. label000000C0:
  71. 000000C0  2F6F 0084 0074           move.l     [A7 + 0x74], [A7 + 0x84]
  72. 000000C6  2F6F 0088 0078           move.l     [A7 + 0x78], [A7 + 0x88]
  73. 000000CC  2F6F 0084 007C           move.l     [A7 + 0x7C], [A7 + 0x84]
  74. 000000D2  2F6F 0088 0080           move.l     [A7 + 0x80], [A7 + 0x88]
  75. 000000D8  486F 0084                pea.l      [A7 + 0x84]
  76. 000000DC  A8A1                     syscall    FrameRect
  77. 000000DE  7800                     moveq.l    D4, 0x00
  78. 000000E0  6000 00AE                bra        +0xB0 /* 00000190 */
  79. label000000E4:
  80. 000000E4  2F03                     move.l     -[A7], D3
  81. 000000E6  3F2A 0002                move.w     -[A7], [A2 + 0x2]
  82. 000000EA  3F2B 0002                move.w     -[A7], [A3 + 0x2]
  83. 000000EE  4EBA 0404                jsr        [PC + 0x404 /* 000004F4 */]
  84. 000000F2  3F40 0096                move.w     [A7 + 0x96], D0
  85. 000000F6  2F03                     move.l     -[A7], D3
  86. 000000F8  3F2A 0006                move.w     -[A7], [A2 + 0x6]
  87. 000000FC  3F2B 0006                move.w     -[A7], [A3 + 0x6]
  88. 00000100  4EBA 03F2                jsr        [PC + 0x3F2 /* 000004F4 */]
  89. 00000104  3F40 00A2                move.w     [A7 + 0xA2], D0
  90. 00000108  2F03                     move.l     -[A7], D3
  91. 0000010A  3F12                     move.w     -[A7], [A2]
  92. 0000010C  3F13                     move.w     -[A7], [A3]
  93. 0000010E  4EBA 03E4                jsr        [PC + 0x3E4 /* 000004F4 */]
  94. 00000112  3F40 00A4                move.w     [A7 + 0xA4], D0
  95. 00000116  2F03                     move.l     -[A7], D3
  96. 00000118  3F2A 0004                move.w     -[A7], [A2 + 0x4]
  97. 0000011C  3F2B 0004                move.w     -[A7], [A3 + 0x4]
  98. 00000120  4EBA 03D2                jsr        [PC + 0x3D2 /* 000004F4 */]
  99. 00000124  3F40 00B0                move.w     [A7 + 0xB0], D0
  100. 00000128  486F 00AC                pea.l      [A7 + 0xAC]
  101. 0000012C  A8A1                     syscall    FrameRect
  102. 0000012E  4A85                     tst.l      D5
  103. 00000130  4FEF 0020                lea.l      A7, [A7 + 0x20]
  104. 00000134  6704                     beq        +0x6 /* 0000013A */
  105. 00000136  5385                     subq.l     D5, 1
  106. 00000138  6006                     bra        +0x8 /* 00000140 */
  107. label0000013A:
  108. 0000013A  486F 0084                pea.l      [A7 + 0x84]
  109. 0000013E  A8A1                     syscall    FrameRect
  110. label00000140:
  111. 00000140  4AAD CF88                tst.l      [A5 - 0x3078]
  112. 00000144  6F18                     ble        +0x1A /* 0000015E */
  113. 00000146  2004                     move.l     D0, D4
  114. 00000148  7203                     moveq.l    D1, 0x03
  115. 0000014A  4EAD D910                jsr        [A5 - 0x26F0]
  116. 0000014E  4A80                     tst.l      D0
  117. 00000150  660C                     bne        +0xE /* 0000015E */
  118. 00000152  206D CF88                movea.l    A0, [A5 - 0x3078]
  119. 00000156  43EF 0070                lea.l      A1, [A7 + 0x70]
  120. 0000015A  A03B                     syscall    Delay
  121. 0000015C  2280                     move.l     [A1], D0
  122. label0000015E:
  123. 0000015E  2F6F 007C 0084           move.l     [A7 + 0x84], [A7 + 0x7C]
  124. 00000164  2F6F 0080 0088           move.l     [A7 + 0x88], [A7 + 0x80]
  125. 0000016A  2F6F 0074 007C           move.l     [A7 + 0x7C], [A7 + 0x74]
  126. 00000170  2F6F 0078 0080           move.l     [A7 + 0x80], [A7 + 0x78]
  127. 00000176  2F6F 008C 0074           move.l     [A7 + 0x74], [A7 + 0x8C]
  128. 0000017C  2F6F 0090 0078           move.l     [A7 + 0x78], [A7 + 0x90]
  129. 00000182  594F                     subq.w     A7, 4
  130. 00000184  2F03                     move.l     -[A7], D3
  131. 00000186  2F06                     move.l     -[A7], D6
  132. 00000188  A868                     syscall    FixMul
  133. 0000018A  201F                     move.l     D0, [A7]+
  134. 0000018C  2600                     move.l     D3, D0
  135. 0000018E  5284                     addq.l     D4, 1
  136. label00000190:
  137. 00000190  7010                     moveq.l    D0, 0x10
  138. 00000192  B880                     cmp.l      D4, D0
  139. 00000194  6D00 FF4E                blt        -0xB0 /* 000000E4 */
  140. 00000198  486F 0084                pea.l      [A7 + 0x84]
  141. 0000019C  A8A1                     syscall    FrameRect
  142. 0000019E  486F 007C                pea.l      [A7 + 0x7C]
  143. 000001A2  A8A1                     syscall    FrameRect
  144. 000001A4  486F 0074                pea.l      [A7 + 0x74]
  145. 000001A8  A8A1                     syscall    FrameRect
  146. 000001AA  486F 0004                pea.l      [A7 + 0x4]
  147. 000001AE  A87D                     syscall    ClosePort
  148. 000001B0  2F17                     move.l     -[A7], [A7]
  149. 000001B2  A873                     syscall    SetPort
  150. label000001B4:
  151. 000001B4  4FEF 0094                lea.l      A7, [A7 + 0x94]
  152. 000001B8  4CDF 5C78                movem.l    D3,D4,D5,D6,A2,A3,A4,A6, [A7]+
  153. 000001BC  4E75                     rts
  154. 000001BE  48E7 1820                movem.l    -[A7], D3,D4,A2
  155. 000001C2  4FEF FFF4                lea.l      A7, [A7 - 0xC]
  156. 000001C6  246F 0020                movea.l    A2, [A7 + 0x20]
  157. 000001CA  262F 0024                move.l     D3, [A7 + 0x24]
  158. 000001CE  7800                     moveq.l    D4, 0x00
  159. 000001D0  4EAD DD70                jsr        [A5 - 0x2290]
  160. 000001D4  206F 001C                movea.l    A0, [A7 + 0x1C]
  161. 000001D8  2F50 0004                move.l     [A7 + 0x4], [A0]
  162. 000001DC  2F68 0004 0008           move.l     [A7 + 0x8], [A0 + 0x4]
  163. label000001E2:
  164. 000001E2  486D 15F0                pea.l      [A5 + 0x15F0]
  165. 000001E6  A89D                     syscall    PenPat
  166. 000001E8  2F3C 0010 0010           move.l     -[A7], 0x100010
  167. 000001EE  A89B                     syscall    PenSize
  168. 000001F0  486F 0004                pea.l      [A7 + 0x4]
  169. 000001F4  A8A1                     syscall    FrameRect
  170. 000001F6  302F 0006                move.w     D0, [A7 + 0x6]
  171. 000001FA  B06A 0002                cmp.w      D0, [A2 + 0x2]
  172. 000001FE  6C1C                     bge        +0x1E /* 0000021C */
  173. 00000200  302F 0004                move.w     D0, [A7 + 0x4]
  174. 00000204  B052                     cmp.w      D0, [A2]
  175. 00000206  6C14                     bge        +0x16 /* 0000021C */
  176. 00000208  302F 000A                move.w     D0, [A7 + 0xA]
  177. 0000020C  B06A 0006                cmp.w      D0, [A2 + 0x6]
  178. 00000210  6F0A                     ble        +0xC /* 0000021C */
  179. 00000212  302F 0008                move.w     D0, [A7 + 0x8]
  180. 00000216  B06A 0004                cmp.w      D0, [A2 + 0x4]
  181. 0000021A  6E30                     bgt        +0x32 /* 0000024C */
  182. label0000021C:
  183. 0000021C  2F3C 0001 0001           move.l     -[A7], 0x10001
  184. 00000222  A89B                     syscall    PenSize
  185. 00000224  486D 15E0                pea.l      [A5 + 0x15E0]
  186. 00000228  A89D                     syscall    PenPat
  187. 0000022A  486F 0004                pea.l      [A7 + 0x4]
  188. 0000022E  A8A1                     syscall    FrameRect
  189. 00000230  486F 0004                pea.l      [A7 + 0x4]
  190. 00000234  2F3C FFF1 FFF1           move.l     -[A7], 0xFFF1FFF1
  191. 0000023A  A8A9                     syscall    InsetRect
  192. 0000023C  4A83                     tst.l      D3
  193. 0000023E  6F08                     ble        +0xA /* 00000248 */
  194. 00000240  2043                     movea.l    A0, D3
  195. 00000242  43D7                     lea.l      A1, [A7]
  196. 00000244  A03B                     syscall    Delay
  197. 00000246  2280                     move.l     [A1], D0
  198. label00000248:
  199. 00000248  5284                     addq.l     D4, 1
  200. 0000024A  6096                     bra        -0x68 /* 000001E2 */
  201. label0000024C:
  202. 0000024C  4EAD DD78                jsr        [A5 - 0x2288]
  203. 00000250  4FEF 000C                lea.l      A7, [A7 + 0xC]
  204. 00000254  4CDF 0418                movem.l    D3,D4,A2, [A7]+
  205. 00000258  4E75                     rts
  206. 0000025A  48E7 1820                movem.l    -[A7], D3,D4,A2
  207. 0000025E  4FEF FFEC                lea.l      A7, [A7 - 0x14]
  208. 00000262  246F 0024                movea.l    A2, [A7 + 0x24]
  209. 00000266  262F 002C                move.l     D3, [A7 + 0x2C]
  210. 0000026A  7800                     moveq.l    D4, 0x00
  211. 0000026C  4EAD DD70                jsr        [A5 - 0x2290]
  212. 00000270  206F 0028                movea.l    A0, [A7 + 0x28]
  213. 00000274  2F50 0004                move.l     [A7 + 0x4], [A0]
  214. 00000278  2F68 0004 0008           move.l     [A7 + 0x8], [A0 + 0x4]
  215. 0000027E  2F50 000C                move.l     [A7 + 0xC], [A0]
  216. 00000282  2F68 0004 0010           move.l     [A7 + 0x10], [A0 + 0x4]
  217. label00000288:
  218. 00000288  2F3C 0001 0001           move.l     -[A7], 0x10001
  219. 0000028E  A89B                     syscall    PenSize
  220. 00000290  486D 15E0                pea.l      [A5 + 0x15E0]
  221. 00000294  A89D                     syscall    PenPat
  222. 00000296  486F 0004                pea.l      [A7 + 0x4]
  223. 0000029A  A8A1                     syscall    FrameRect
  224. 0000029C  2F3C 000F 000F           move.l     -[A7], 0xF000F
  225. 000002A2  A89B                     syscall    PenSize
  226. 000002A4  486D 15F0                pea.l      [A5 + 0x15F0]
  227. 000002A8  A89D                     syscall    PenPat
  228. 000002AA  486F 000C                pea.l      [A7 + 0xC]
  229. 000002AE  A8A1                     syscall    FrameRect
  230. 000002B0  486F 000C                pea.l      [A7 + 0xC]
  231. 000002B4  2F3C 000F 000F           move.l     -[A7], 0xF000F
  232. 000002BA  A8A9                     syscall    InsetRect
  233. 000002BC  2F6F 000C 0004           move.l     [A7 + 0x4], [A7 + 0xC]
  234. 000002C2  2F6F 0010 0008           move.l     [A7 + 0x8], [A7 + 0x10]
  235. 000002C8  302A 0002                move.w     D0, [A2 + 0x2]
  236. 000002CC  48C0                     ext.l      D0
  237. 000002CE  322F 000E                move.w     D1, [A7 + 0xE]
  238. 000002D2  48C1                     ext.l      D1
  239. 000002D4  740F                     moveq.l    D2, 0x0F
  240. 000002D6  D282                     add.l      D1, D2
  241. 000002D8  B280                     cmp.l      D1, D0
  242. 000002DA  6F38                     ble        +0x3A /* 00000314 */
  243. 000002DC  3012                     move.w     D0, [A2]
  244. 000002DE  48C0                     ext.l      D0
  245. 000002E0  322F 000C                move.w     D1, [A7 + 0xC]
  246. 000002E4  48C1                     ext.l      D1
  247. 000002E6  D282                     add.l      D1, D2
  248. 000002E8  B280                     cmp.l      D1, D0
  249. 000002EA  6F28                     ble        +0x2A /* 00000314 */
  250. 000002EC  302A 0006                move.w     D0, [A2 + 0x6]
  251. 000002F0  48C0                     ext.l      D0
  252. 000002F2  322F 0012                move.w     D1, [A7 + 0x12]
  253. 000002F6  48C1                     ext.l      D1
  254. 000002F8  74F1                     moveq.l    D2, 0xFFFFFFF1
  255. 000002FA  D282                     add.l      D1, D2
  256. 000002FC  B280                     cmp.l      D1, D0
  257. 000002FE  6C14                     bge        +0x16 /* 00000314 */
  258. 00000300  302A 0004                move.w     D0, [A2 + 0x4]
  259. 00000304  48C0                     ext.l      D0
  260. 00000306  322F 0010                move.w     D1, [A7 + 0x10]
  261. 0000030A  48C1                     ext.l      D1
  262. 0000030C  D282                     add.l      D1, D2
  263. 0000030E  B280                     cmp.l      D1, D0
  264. 00000310  6D00 00AE                blt        +0xB0 /* 000003C0 */
  265. label00000314:
  266. 00000314  302A 0002                move.w     D0, [A2 + 0x2]
  267. 00000318  48C0                     ext.l      D0
  268. 0000031A  322F 000E                move.w     D1, [A7 + 0xE]
  269. 0000031E  48C1                     ext.l      D1
  270. 00000320  740F                     moveq.l    D2, 0x0F
  271. 00000322  D282                     add.l      D1, D2
  272. 00000324  B280                     cmp.l      D1, D0
  273. 00000326  6F14                     ble        +0x16 /* 0000033C */
  274. 00000328  302A 0002                move.w     D0, [A2 + 0x2]
  275. 0000032C  48C0                     ext.l      D0
  276. 0000032E  72F1                     moveq.l    D1, 0xFFFFFFF1
  277. 00000330  D081                     add.l      D0, D1
  278. 00000332  3F40 000E                move.w     [A7 + 0xE], D0
  279. 00000336  3F6A 0002 0006           move.w     [A7 + 0x6], [A2 + 0x2]
  280. label0000033C:
  281. 0000033C  302A 0006                move.w     D0, [A2 + 0x6]
  282. 00000340  48C0                     ext.l      D0
  283. 00000342  322F 0012                move.w     D1, [A7 + 0x12]
  284. 00000346  48C1                     ext.l      D1
  285. 00000348  74F1                     moveq.l    D2, 0xFFFFFFF1
  286. 0000034A  D282                     add.l      D1, D2
  287. 0000034C  B280                     cmp.l      D1, D0
  288. 0000034E  6C14                     bge        +0x16 /* 00000364 */
  289. 00000350  302A 0006                move.w     D0, [A2 + 0x6]
  290. 00000354  48C0                     ext.l      D0
  291. 00000356  720F                     moveq.l    D1, 0x0F
  292. 00000358  D081                     add.l      D0, D1
  293. 0000035A  3F40 0012                move.w     [A7 + 0x12], D0
  294. 0000035E  3F6A 0006 000A           move.w     [A7 + 0xA], [A2 + 0x6]
  295. label00000364:
  296. 00000364  3012                     move.w     D0, [A2]
  297. 00000366  48C0                     ext.l      D0
  298. 00000368  322F 000C                move.w     D1, [A7 + 0xC]
  299. 0000036C  48C1                     ext.l      D1
  300. 0000036E  740F                     moveq.l    D2, 0x0F
  301. 00000370  D282                     add.l      D1, D2
  302. 00000372  B280                     cmp.l      D1, D0
  303. 00000374  6F10                     ble        +0x12 /* 00000386 */
  304. 00000376  3012                     move.w     D0, [A2]
  305. 00000378  48C0                     ext.l      D0
  306. 0000037A  72F1                     moveq.l    D1, 0xFFFFFFF1
  307. 0000037C  D081                     add.l      D0, D1
  308. 0000037E  3F40 000C                move.w     [A7 + 0xC], D0
  309. 00000382  3F52 0004                move.w     [A7 + 0x4], [A2]
  310. label00000386:
  311. 00000386  302A 0004                move.w     D0, [A2 + 0x4]
  312. 0000038A  48C0                     ext.l      D0
  313. 0000038C  322F 0010                move.w     D1, [A7 + 0x10]
  314. 00000390  48C1                     ext.l      D1
  315. 00000392  74F1                     moveq.l    D2, 0xFFFFFFF1
  316. 00000394  D282                     add.l      D1, D2
  317. 00000396  B280                     cmp.l      D1, D0
  318. 00000398  6C14                     bge        +0x16 /* 000003AE */
  319. 0000039A  302A 0004                move.w     D0, [A2 + 0x4]
  320. 0000039E  48C0                     ext.l      D0
  321. 000003A0  720F                     moveq.l    D1, 0x0F
  322. 000003A2  D081                     add.l      D0, D1
  323. 000003A4  3F40 0010                move.w     [A7 + 0x10], D0
  324. 000003A8  3F6A 0004 0008           move.w     [A7 + 0x8], [A2 + 0x4]
  325. label000003AE:
  326. 000003AE  4A83                     tst.l      D3
  327. 000003B0  6F08                     ble        +0xA /* 000003BA */
  328. 000003B2  2043                     movea.l    A0, D3
  329. 000003B4  43D7                     lea.l      A1, [A7]
  330. 000003B6  A03B                     syscall    Delay
  331. 000003B8  2280                     move.l     [A1], D0
  332. label000003BA:
  333. 000003BA  5284                     addq.l     D4, 1
  334. 000003BC  6000 FECA                bra        -0x134 /* 00000288 */
  335. label000003C0:
  336. 000003C0  486F 0004                pea.l      [A7 + 0x4]
  337. 000003C4  A8A1                     syscall    FrameRect
  338. 000003C6  4EAD DD78                jsr        [A5 - 0x2288]
  339. 000003CA  4FEF 0014                lea.l      A7, [A7 + 0x14]
  340. 000003CE  4CDF 0418                movem.l    D3,D4,A2, [A7]+
  341. 000003D2  4E75                     rts
  342. 000003D4  48E7 1F3A                movem.l    -[A7], D3,D4,D5,D6,D7,A2,A3,A4,A6
  343. 000003D8  4FEF FFF4                lea.l      A7, [A7 - 0xC]
  344. 000003DC  246F 0034                movea.l    A2, [A7 + 0x34]
  345. 000003E0  302F 0038                move.w     D0, [A7 + 0x38]
  346. 000003E4  48C0                     ext.l      D0
  347. 000003E6  2840                     movea.l    A4, D0
  348. 000003E8  7800                     moveq.l    D4, 0x00
  349. 000003EA  594F                     subq.w     A7, 4
  350. 000003EC  A8D8                     syscall    NewRgn
  351. 000003EE  205F                     movea.l    A0, [A7]+
  352. 000003F0  2648                     movea.l    A3, A0
  353. 000003F2  2008                     move.l     D0, A0
  354. 000003F4  6700 00C2                beq        +0xC4 /* 000004B8 */
  355. 000003F8  302A 0002                move.w     D0, [A2 + 0x2]
  356. 000003FC  48C0                     ext.l      D0
  357. 000003FE  3E2A 0006                move.w     D7, [A2 + 0x6]
  358. 00000402  48C7                     ext.l      D7
  359. 00000404  9E80                     sub.l      D7, D0
  360. 00000406  5587                     subq.l     D7, 2
  361. 00000408  3007                     move.w     D0, D7
  362. 0000040A  48C0                     ext.l      D0
  363. 0000040C  720F                     moveq.l    D1, 0x0F
  364. 0000040E  4EAD D904                jsr        [A5 - 0x26FC]
  365. 00000412  3C00                     move.w     D6, D0
  366. 00000414  4A46                     tst.w      D6
  367. 00000416  6604                     bne        +0x6 /* 0000041C */
  368. 00000418  3C3C 7FFF                move.w     D6, 0x7FFF
  369. label0000041C:
  370. 0000041C  3012                     move.w     D0, [A2]
  371. 0000041E  48C0                     ext.l      D0
  372. 00000420  5280                     addq.l     D0, 1
  373. 00000422  3F40 0004                move.w     [A7 + 0x4], D0
  374. 00000426  302A 0004                move.w     D0, [A2 + 0x4]
  375. 0000042A  48C0                     ext.l      D0
  376. 0000042C  5380                     subq.l     D0, 1
  377. 0000042E  3F40 0008                move.w     [A7 + 0x8], D0
  378. 00000432  6078                     bra        +0x7A /* 000004AC */
  379. label00000434:
  380. 00000434  554F                     subq.w     A7, 2
  381. 00000436  A861                     syscall    Random
  382. 00000438  301F                     move.w     D0, [A7]+
  383. 0000043A  7200                     moveq.l    D1, 0x00
  384. 0000043C  3200                     move.w     D1, D0
  385. 0000043E  3007                     move.w     D0, D7
  386. 00000440  48C0                     ext.l      D0
  387. 00000442  2E81                     move.l     [A7], D1
  388. 00000444  2200                     move.l     D1, D0
  389. 00000446  2017                     move.l     D0, [A7]
  390. 00000448  4EAD D910                jsr        [A5 - 0x26F0]
  391. 0000044C  3600                     move.w     D3, D0
  392. 0000044E  7A14                     moveq.l    D5, 0x14
  393. 00000450  4A43                     tst.w      D3
  394. 00000452  6712                     beq        +0x14 /* 00000466 */
  395. 00000454  3006                     move.w     D0, D6
  396. 00000456  48C0                     ext.l      D0
  397. 00000458  5284                     addq.l     D4, 1
  398. 0000045A  B880                     cmp.l      D4, D0
  399. 0000045C  6D0A                     blt        +0xC /* 00000468 */
  400. 0000045E  7800                     moveq.l    D4, 0x00
  401. 00000460  7600                     moveq.l    D3, 0x00
  402. 00000462  7A0C                     moveq.l    D5, 0x0C
  403. 00000464  6002                     bra        +0x4 /* 00000468 */
  404. label00000466:
  405. 00000466  7800                     moveq.l    D4, 0x00
  406. label00000468:
  407. 00000468  7000                     moveq.l    D0, 0x00
  408. 0000046A  3003                     move.w     D0, D3
  409. 0000046C  322A 0002                move.w     D1, [A2 + 0x2]
  410. 00000470  48C1                     ext.l      D1
  411. 00000472  5281                     addq.l     D1, 1
  412. 00000474  D280                     add.l      D1, D0
  413. 00000476  3F41 0006                move.w     [A7 + 0x6], D1
  414. 0000047A  3005                     move.w     D0, D5
  415. 0000047C  48C0                     ext.l      D0
  416. 0000047E  48C1                     ext.l      D1
  417. 00000480  D280                     add.l      D1, D0
  418. 00000482  3F41 000A                move.w     [A7 + 0xA], D1
  419. 00000486  302A 0006                move.w     D0, [A2 + 0x6]
  420. 0000048A  48C0                     ext.l      D0
  421. 0000048C  5380                     subq.l     D0, 1
  422. 0000048E  2C40                     movea.l    A6, D0
  423. 00000490  3001                     move.w     D0, D1
  424. 00000492  48C0                     ext.l      D0
  425. 00000494  B08E                     cmp.l      D0, A6
  426. 00000496  6F06                     ble        +0x8 /* 0000049E */
  427. 00000498  200E                     move.l     D0, A6
  428. 0000049A  3F40 000A                move.w     [A7 + 0xA], D0
  429. label0000049E:
  430. 0000049E  486F 0004                pea.l      [A7 + 0x4]
  431. 000004A2  2F3C 0001 0000           move.l     -[A7], 0x10000
  432. 000004A8  2F0B                     move.l     -[A7], A3
  433. 000004AA  A8EF                     syscall    ScrollRect
  434. label000004AC:
  435. 000004AC  200C                     move.l     D0, A4
  436. 000004AE  538C                     subq.l     A4, 1
  437. 000004B0  4A80                     tst.l      D0
  438. 000004B2  6680                     bne        -0x7E /* 00000434 */
  439. 000004B4  2F0B                     move.l     -[A7], A3
  440. 000004B6  A8D9                     syscall    DisposRgn/DisposeRgn
  441. label000004B8:
  442. 000004B8  4FEF 000C                lea.l      A7, [A7 + 0xC]
  443. 000004BC  4CDF 5CF8                movem.l    D3,D4,D5,D6,D7,A2,A3,A4,A6, [A7]+
  444. 000004C0  4E75                     rts
  445. fn000004C2:
  446. 000004C2  594F                     subq.w     A7, 4
  447. 000004C4  4AAD CF88                tst.l      [A5 - 0x3078]
  448. 000004C8  6C26                     bge        +0x28 /* 000004F0 */
  449. 000004CA  554F                     subq.w     A7, 2
  450. 000004CC  2F3C 7072 6F63           move.l     -[A7], 0x70726F63 /* 'proc' */
  451. 000004D2  486F 0006                pea.l      [A7 + 0x6]
  452. 000004D6  4EAD DA66                jsr        [A5 - 0x259A]
  453. 000004DA  301F                     move.w     D0, [A7]+
  454. 000004DC  660E                     bne        +0x10 /* 000004EC */
  455. 000004DE  7004                     moveq.l    D0, 0x04
  456. 000004E0  B097                     cmp.l      D0, [A7]
  457. 000004E2  6408                     bcc        +0xA /* 000004EC */
  458. 000004E4  7001                     moveq.l    D0, 0x01
  459. 000004E6  2B40 CF88                move.l     [A5 - 0x3078], D0
  460. 000004EA  6004                     bra        +0x6 /* 000004F0 */
  461. label000004EC:
  462. 000004EC  42AD CF88                clr.l      [A5 - 0x3078]
  463. label000004F0:
  464. 000004F0  584F                     addq.w     A7, 4
  465. 000004F2  4E75                     rts
  466. fn000004F4:
  467. 000004F4  48E7 1E00                movem.l    -[A7], D3,D4,D5,D6
  468. 000004F8  594F                     subq.w     A7, 4
  469. 000004FA  2C2F 001C                move.l     D6, [A7 + 0x1C]
  470. 000004FE  362F 0018                move.w     D3, [A7 + 0x18]
  471. 00000502  48C3                     ext.l      D3
  472. 00000504  7210                     moveq.l    D1, 0x10
  473. 00000506  E3AB                     lsl        D3, D1
  474. 00000508  382F 001A                move.w     D4, [A7 + 0x1A]
  475. 0000050C  48C4                     ext.l      D4
  476. 0000050E  E3AC                     lsl        D4, D1
  477. 00000510  594F                     subq.w     A7, 4
  478. 00000512  203C 0001 0000           move.l     D0, 0x10000
  479. 00000518  9086                     sub.l      D0, D6
  480. 0000051A  2F00                     move.l     -[A7], D0
  481. 0000051C  2F03                     move.l     -[A7], D3
  482. 0000051E  A868                     syscall    FixMul
  483. 00000520  201F                     move.l     D0, [A7]+
  484. 00000522  2E80                     move.l     [A7], D0
  485. 00000524  594F                     subq.w     A7, 4
  486. 00000526  2F06                     move.l     -[A7], D6
  487. 00000528  2F04                     move.l     -[A7], D4
  488. 0000052A  A868                     syscall    FixMul
  489. 0000052C  201F                     move.l     D0, [A7]+
  490. 0000052E  D097                     add.l      D0, [A7]
  491. 00000530  2A00                     move.l     D5, D0
  492. 00000532  554F                     subq.w     A7, 2
  493. 00000534  2F05                     move.l     -[A7], D5
  494. 00000536  A86C                     syscall    FixRound
  495. 00000538  301F                     move.w     D0, [A7]+
  496. 0000053A  584F                     addq.w     A7, 4
  497. 0000053C  4CDF 0078                movem.l    D3,D4,D5,D6, [A7]+
  498. 00000540  4E75                     rts
  499. 00000542  0000 0000                ori.b      D0, 0x0
  500. 00000546  0000 0000                ori.b      D0, 0x0
  501. 0000054A  0000 0000                ori.b      D0, 0x0
  502.